3.147 \(\int (1+\sin (c+d x))^n \, dx\)

Optimal. Leaf size=58 \[ -\frac{2^{n+\frac{1}{2}} \cos (c+d x) \, _2F_1\left (\frac{1}{2},\frac{1}{2}-n;\frac{3}{2};\frac{1}{2} (1-\sin (c+d x))\right )}{d \sqrt{\sin (c+d x)+1}} \]

[Out]

-((2^(1/2 + n)*Cos[c + d*x]*Hypergeometric2F1[1/2, 1/2 - n, 3/2, (1 - Sin[c + d*x])/2])/(d*Sqrt[1 + Sin[c + d*
x]]))

________________________________________________________________________________________

Rubi [A]  time = 0.0139806, antiderivative size = 58, normalized size of antiderivative = 1., number of steps used = 1, number of rules used = 1, integrand size = 10, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.1, Rules used = {2651} \[ -\frac{2^{n+\frac{1}{2}} \cos (c+d x) \, _2F_1\left (\frac{1}{2},\frac{1}{2}-n;\frac{3}{2};\frac{1}{2} (1-\sin (c+d x))\right )}{d \sqrt{\sin (c+d x)+1}} \]

Antiderivative was successfully verified.

[In]

Int[(1 + Sin[c + d*x])^n,x]

[Out]

-((2^(1/2 + n)*Cos[c + d*x]*Hypergeometric2F1[1/2, 1/2 - n, 3/2, (1 - Sin[c + d*x])/2])/(d*Sqrt[1 + Sin[c + d*
x]]))

Rule 2651

Int[((a_) + (b_.)*sin[(c_.) + (d_.)*(x_)])^(n_), x_Symbol] :> -Simp[(2^(n + 1/2)*a^(n - 1/2)*b*Cos[c + d*x]*Hy
pergeometric2F1[1/2, 1/2 - n, 3/2, (1*(1 - (b*Sin[c + d*x])/a))/2])/(d*Sqrt[a + b*Sin[c + d*x]]), x] /; FreeQ[
{a, b, c, d, n}, x] && EqQ[a^2 - b^2, 0] &&  !IntegerQ[2*n] && GtQ[a, 0]

Rubi steps

\begin{align*} \int (1+\sin (c+d x))^n \, dx &=-\frac{2^{\frac{1}{2}+n} \cos (c+d x) \, _2F_1\left (\frac{1}{2},\frac{1}{2}-n;\frac{3}{2};\frac{1}{2} (1-\sin (c+d x))\right )}{d \sqrt{1+\sin (c+d x)}}\\ \end{align*}

Mathematica [A]  time = 0.12066, size = 88, normalized size = 1.52 \[ \frac{\sqrt{2} \cos (c+d x) (\sin (c+d x)+1)^n \, _2F_1\left (\frac{1}{2},n+\frac{1}{2};n+\frac{3}{2};\frac{1}{4} \cos ^2(c+d x) \csc ^2\left (\frac{1}{4} (2 c+2 d x-\pi )\right )\right )}{(2 d n+d) \sqrt{1-\sin (c+d x)}} \]

Antiderivative was successfully verified.

[In]

Integrate[(1 + Sin[c + d*x])^n,x]

[Out]

(Sqrt[2]*Cos[c + d*x]*Hypergeometric2F1[1/2, 1/2 + n, 3/2 + n, (Cos[c + d*x]^2*Csc[(2*c - Pi + 2*d*x)/4]^2)/4]
*(1 + Sin[c + d*x])^n)/((d + 2*d*n)*Sqrt[1 - Sin[c + d*x]])

________________________________________________________________________________________

Maple [F]  time = 0.26, size = 0, normalized size = 0. \begin{align*} \int \left ( 1+\sin \left ( dx+c \right ) \right ) ^{n}\, dx \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((1+sin(d*x+c))^n,x)

[Out]

int((1+sin(d*x+c))^n,x)

________________________________________________________________________________________

Maxima [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int{\left (\sin \left (d x + c\right ) + 1\right )}^{n}\,{d x} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1+sin(d*x+c))^n,x, algorithm="maxima")

[Out]

integrate((sin(d*x + c) + 1)^n, x)

________________________________________________________________________________________

Fricas [F]  time = 0., size = 0, normalized size = 0. \begin{align*}{\rm integral}\left ({\left (\sin \left (d x + c\right ) + 1\right )}^{n}, x\right ) \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1+sin(d*x+c))^n,x, algorithm="fricas")

[Out]

integral((sin(d*x + c) + 1)^n, x)

________________________________________________________________________________________

Sympy [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int \left (\sin{\left (c + d x \right )} + 1\right )^{n}\, dx \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1+sin(d*x+c))**n,x)

[Out]

Integral((sin(c + d*x) + 1)**n, x)

________________________________________________________________________________________

Giac [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int{\left (\sin \left (d x + c\right ) + 1\right )}^{n}\,{d x} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1+sin(d*x+c))^n,x, algorithm="giac")

[Out]

integrate((sin(d*x + c) + 1)^n, x)